home *** CD-ROM | disk | FTP | other *** search
/ PD ROM 1 / PD ROM Volume I - Macintosh Software from BMUG (1988).iso / Telecommunications / Updates⁄New / MicroPhone 2 Scripts / CallLogMP2 / Wait for Call < prev   
Encoding:
Text File  |  1988-06-11  |  579 b   |  21 lines  |  [TEXT/ttxt]
  1.  Modem File = Standard (Call Log)
  2.  Modem Script Name = Wait for Call
  3.  
  4. 1   Dialog Install  "Waiting for Call"
  5. 2   Do Script * "Grab Modem"
  6. 3   If Success 
  7. 4     Send Text String  "ATS0=1^M"
  8. 5     Wait for Line Containing  "Connect"
  9. 6     If Line Contains  "300"
  10. 7       Set Comm Param Baud Rate 300 
  11. 8     Else If Line Contains  "1200"
  12. 9       Set Comm Param Baud Rate 1200 
  13. 10    Else If Line Contains  "2400"
  14. 11      Set Comm Param Baud Rate 2400 
  15. 12    End If
  16. 13    Set Variable online from Expression  "=true"
  17. 14    Dialog Discard  
  18. 15  Else
  19. 16    Dialog Discard  
  20. 17  End If
  21.